home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 2010 April / PCWorld0410.iso / hity wydania / Ubuntu 9.10 PL / karmelkowy-koliberek-desktop-9.10-i386-PL.iso / casper / filesystem.squashfs / usr / share / m17n / BENG-OTF.flt < prev    next >
Text File  |  2009-04-29  |  6KB  |  213 lines
  1. ;; BENG-OTF.flt -- Font Layout Table for Bengali OpenType font
  2. ;; Copyright (C) 2004, 2007  AIST (H15PRO112)
  3. ;; See the end for copying conditions.
  4.  
  5. (font layouter beng-otf nil
  6.       (font (nil nil unicode-bmp :otf=beng=rphf)))
  7.  
  8. ;;; <li> BENG-OTF.flt
  9. ;;;
  10. ;;; For Bengali OpenType fonts to draw the Bengali script.  
  11.  
  12. (category
  13.  ;; X: generic
  14.  ;; V: independent vowel
  15.  ;; C: consonant (except for R, B and Y)
  16.  ;; R: consonant RA
  17.  ;; B: consonant BA
  18.  ;; Y: consonant YA
  19.  ;; T: KHANDA TA
  20.  ;; n: NUKTA
  21.  ;; H: HALANT
  22.  ;; m: vowel sign (pre)
  23.  ;; b: vowel sign (below)
  24.  ;; p: vowel sign (post)
  25.  ;; A: vowel modifier (above)
  26.  ;; a: vowel modifier (post)
  27.  ;; Z: internal use
  28.  ;; N: ZWNJ (ZERO WIDTH NON-JOINER)
  29.  ;; J: ZWJ (ZERO WIDTH JOINER)
  30.  (0x0980 0x09FF    ?X)            ; generic
  31.  (0x0980    ?Z)            ; internal use
  32.  (0x0981    ?A)            ; SIGN CANDRABINDU
  33.  (0x0982 0x0983    ?a)            ; SIGN ANUSVARA .. VISARGA
  34.  (0x0985 0x0994    ?V)            ; LETTER A .. AU
  35.  (0x0995 0x09B9    ?C)            ; LETTER KA .. HA
  36.  (0x09AC    ?B)            ; LETTER BA
  37.  (0x09AF    ?Y)            ; LETTER YA
  38.  (0x09B0    ?R)            ; LETTER RA
  39.  (0x09BC    ?n)            ; SIGN NUKTA
  40.  (0x09BE    ?p)            ; VOWEL SIGN AA
  41.  (0x09BF    ?m)            ; VOWEL SIGN I
  42.  (0x09C0    ?p)            ; VOWEL SIGN II
  43.  (0x09C1 0x09C4    ?b)            ; VOWEL SIGN U .. RR
  44.  (0x09C7 0x09C8    ?m)            ; VOWEL SIGN E .. AI
  45.  (0x09CD    ?H)            ; SIGN VIRAMA
  46.  (0x09CE    ?T)            ; LETTER KHANDA TA
  47.  (0x09D7    ?p)            ; AU LENGTH MARK
  48.  (0x09DC 0x09DF    ?C)            ; LETTER RRA .. YYA
  49.  (0x09E0 0x09E1    ?V)            ; LETTER VOCALIC RR, LL
  50.  (0x09E2 0x09E3    ?b)            ; VOWEL SIGN L .. LL
  51.  (0x09F0 0x09F1    ?C)            ; LETTER RR WITH MIDDLE/LOWER DIAGONAL
  52.  (0x0964 0x0965    ?X)            ; DANDA .. DOUBLE DANDA
  53.  (0x200C    ?N)            ; ZWNJ
  54.  (0x200D    ?J)            ; ZWJ
  55.  )
  56.  
  57. ;; Preprocessing
  58. (generator
  59.  (0
  60.   (cond
  61.    ;; Decompose two-part vowel signs.
  62.    ((0x09CB)
  63.     0x09C7 0x09BE)
  64.    ((0x09CC)
  65.     0x09C7 0x09D7)
  66.    ;; TA + HALANT + ZWJ -> KHANDA-TA
  67.    ((0x09A4 0x09CD 0x200D)
  68.     0x09CE)
  69.    ;; consonant + NUKTA
  70.    ((0x09A1 0x09BC)
  71.     0x09DC)
  72.    ((0x09A2 0x09BC)
  73.     0x09DD)
  74.    ((0x09AF 0x09BC)
  75.     0x09DF)
  76.    ("." =))
  77.   *))
  78.  
  79. ;; Syllable identification and reordering.
  80. (generator
  81.  (0
  82.   (cond
  83.    ;; Khanda-Ta
  84.    ("(RH)?(T)"
  85.     < | (2 =) (1 otf:beng=rphf+) | >)
  86.  
  87.    ;; A syllable with a pre-base vowel sign.
  88.    ;;1    2        3      4       5       6  7   8   9
  89.    ("(RH)?([CRBY]n?(HCn?)*(H[RB])?(J?HY)?)(m)(p)?(A)?(a)?"
  90.     < | (6 =) (2 pre-below) (1 otf:beng=rphf+) (8 =) (2 post) (7 =) (9 =) | >)
  91.  
  92.    ;; A syllable with a non-pre-base vowel sign.
  93.    ;;1    2        3      4       5       6     78   9   10  11
  94.    ("(RH)?([CRBY]n?(HCn?)*(H[RB])?(J?HY)?)(N)?J?((b)|(p))(A)?(a)?"
  95.     < | (6 =) (2 pre-below) (8 =) (1 otf:beng=rphf+) (10 =)
  96.     (2 post) (9 =) (11 =) | >)
  97.  
  98.    ;; A syllable with a vowel modifier and no vowel signs.
  99.    ;;1    2        3      4       5       67   8
  100.    ("(RH)?([CRBY]n?(HCn?)*(H[RB])?(J?HY)?)((A)|(a))"
  101.     < | (2 pre-below) (1 otf:beng=rphf+) (7 =) (2 post) (8 =) | >)
  102.  
  103.    ;; A syllable ending with a halant.
  104.    ;;1    2        3      4       5       6
  105.    ("(RH)?([CRBY]n?(HCn?)*(H[RB])?(J?HY)?)(HN?)?"
  106.     < | (2 pre-below) (6 =) (1 otf:beng=rphf+) (2 post) | >)
  107.  
  108.    ;; A syllable starting with an independent vowel.
  109.    ;;1  2  3  4  5    6
  110.    ("(V)(J?(H)(Y)(p))?(A?a?)"
  111.     < | (1 =) 0x0980 (4 =) (3 =) (5 =) (6 = *) | >)
  112.  
  113.    ("." =))
  114.   *)
  115.  
  116.  ;; Move a halant after the base consonant to the end.
  117.  ;; Put a special mark after the final belew-base consonant.
  118.  ;; Remove post-base parts.
  119.  (pre-below
  120.   (cond
  121.    ("(.+)(H)([RB])(J?HY)?$"
  122.     (1 = *) (3 =) (2 =) 0x0980)
  123.    ("([^J]+)J?HY$"
  124.     (1 = *) 0x0980)
  125.    (".+"
  126.     = * 0x0980)))
  127.  
  128.  ;; Extract post-base parts and add a halant at the end.
  129.  ;; Produce nothing if there are no post-base parts.
  130.  (post
  131.   (cond
  132.    (".*(H)(Y)$"
  133.     (2 =) (1 =)))))
  134.  
  135. ;; Apply 'nukt' and 'akhn'.
  136. (generator
  137.  (0
  138.   (cond
  139.    (" ([^Z]+)(Z[^ ]*) "
  140.     | (1 otf:beng=nukt,akhn+) (2 = *) |)
  141.    ("." =))
  142.   *))
  143.  
  144. ;; Apply 'blwf' and 'pstf' to the concerning parts.
  145. (generator
  146.  (0
  147.   (cond
  148.    (" (N?m?.)([^Z]*)(Z)([^ ]*) "
  149.     | (1 = *) (2 otf:beng=blwf+) (3 =) (4 otf:beng=pstf+) |)
  150.    ("." =))
  151.   *))
  152.  
  153. ;; Get pre-base and below-base conjuncts.
  154. (generator
  155.  (0
  156.   (cond
  157.    (" (N?m?)([^Z]+)(Z)([^ ]*) "
  158.     | (1 = *) (2 otf:beng=half,vatu,pres,blws+) (3 =) (4 = *) |)
  159.    ("." =))
  160.   *))
  161.  
  162. ;; When the number of glyphs between a pre-base vowel sign and the
  163. ;; post-below mark is more than one, move the pre-base vowel sign
  164. ;; before the final glyph.
  165. (generator
  166.  (0
  167.   (cond
  168.    (" (N)?(m)([^Z]+)([^Z])Z([^ ]*) "
  169.     | (1 =) (3 = *) (2 =) (4 =) (5 = *) |)
  170.    (" ([^Z]+)Z([^ ]*) "
  171.     | (1 = *) (2 = *) |)
  172.    ("." =))
  173.   *))
  174.  
  175. ;; Get matra conjuncts.
  176. ;; Do not apply 'blws' to syllables that begins with ZWNJ.
  177. (generator
  178.  (0
  179.   (cond
  180.    (" N([^ ]+) "
  181.     (1 otf:beng=init,pres,abvs,psts,haln+abvm,blwm,dist))
  182.    (" ([^ ]+) "
  183.     (1 otf:beng=init,pres,abvs,blws,psts,haln+abvm,blwm,dist))
  184.    ("."
  185.     [ = ]))
  186.   *))
  187.  
  188. ;; Copyright (C) 2004, 2007
  189. ;;   National Institute of Advanced Industrial Science and Technology (AIST)
  190. ;;   Registration Number H15PRO112
  191.  
  192. ;; This file is part of the m17n database; a sub-part of the m17n
  193. ;; library.
  194.  
  195. ;; The m17n library is free software; you can redistribute it and/or
  196. ;; modify it under the terms of the GNU Lesser General Public License
  197. ;; as published by the Free Software Foundation; either version 2.1 of
  198. ;; the License, or (at your option) any later version.
  199.  
  200. ;; The m17n library is distributed in the hope that it will be useful,
  201. ;; but WITHOUT ANY WARRANTY; without even the implied warranty of
  202. ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  203. ;; Lesser General Public License for more details.
  204.  
  205. ;; You should have received a copy of the GNU Lesser General Public
  206. ;; License along with the m17n library; if not, write to the Free
  207. ;; Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
  208. ;; Boston, MA 02110-1301, USA.
  209.  
  210. ;; Local Variables:
  211. ;; mode: emacs-lisp
  212. ;; End:
  213.